﻿Public Class ClientesComBE
    Private _IdCli As Integer
    Private _LimCre As Decimal
    Private _Saldo As Decimal
    Private _DiasCred As Integer
    Private _MetPag As MetodospagBE
    Private _Banco As String
    Private _CuentaBan As String

    Private _ClienteMayoreo As Boolean
    Private _ListPrec As Integer
    Private _Desccuento As Decimal
    Private _Clasificacion As String
    Private _Vendedor As VendedoresBE
    Private _CtaContable As String
    'Private _SubCta As String
    Private _CtaAnticipos As String


    Public Property IdCli() As Integer
        Get
            Return _IdCli
        End Get
        Set(ByVal value As Integer)
            _IdCli = value
        End Set
    End Property
    Public Property LimiteCredito() As Decimal
        Get
            Return _LimCre
        End Get
        Set(ByVal value As Decimal)
            _LimCre = value
        End Set
    End Property
    Public Property Saldo() As Decimal
        Get
            Return _Saldo
        End Get
        Set(ByVal value As Decimal)
            _Saldo = value
        End Set
    End Property
    Public Property DiasCredito() As Integer
        Get
            Return _DiasCred
        End Get
        Set(ByVal value As Integer)
            _DiasCred = value
        End Set
    End Property
    Public Property MetodoPago() As MetodospagBE
        Get
            Return _MetPag
        End Get
        Set(ByVal value As MetodospagBE)
            _MetPag = value
        End Set
    End Property

    Public Property Banco() As String
        Get
            Return _Banco
        End Get
        Set(ByVal value As String)
            _Banco = value
        End Set
    End Property
    Public Property CuentaBancaria() As String
        Get
            Return _CuentaBan
        End Get
        Set(ByVal value As String)
            _CuentaBan = value
        End Set
    End Property

    Public Property ClienteMayoreo() As Boolean
        Get
            Return _ClienteMayoreo
        End Get
        Set(ByVal value As Boolean)
            _ClienteMayoreo = value
        End Set
    End Property

    Public Property ListPrecios() As Integer
        Get
            Return _ListPrec
        End Get
        Set(ByVal value As Integer)
            _ListPrec = value
        End Set
    End Property

    Public Property Descuento() As Decimal
        Get
            Return _Desccuento
        End Get
        Set(ByVal value As Decimal)
            _Desccuento = value
        End Set
    End Property

    Public Property Clasificacion() As String
        Get
            Return _Clasificacion
        End Get
        Set(ByVal value As String)
            _Clasificacion = value
        End Set
    End Property

    Public Property Vendedor() As VendedoresBE
        Get
            Return _Vendedor
        End Get
        Set(ByVal value As VendedoresBE)
            _Vendedor = value
        End Set
    End Property

    Public Property CuentaContable() As String
        Get
            Return _CtaContable
        End Get
        Set(ByVal value As String)
            _CtaContable = value
        End Set
    End Property

    'Public Property SubCuenta() As String
    '    Get
    '        Return _SubCta
    '    End Get
    '    Set(ByVal value As String)
    '        _SubCta = value
    '    End Set
    'End Property

    Public Property CuentaAnticipos() As String
        Get
            Return _CtaAnticipos
        End Get
        Set(ByVal value As String)
            _CtaAnticipos = value
        End Set
    End Property
End Class
